home *** CD-ROM | disk | FTP | other *** search
/ Inter.Net 55-1 / Inter.Net 55-1.iso / CBuilder / Setup / BCB / data.z / navsdi.cpp < prev    next >
Encoding:
C/C++ Source or Header  |  1998-02-09  |  1.4 KB  |  36 lines
  1. //----------------------------------------------------------------------------
  2. //Borland C++Builder
  3. //Copyright (c) 1987, 1998 Borland International Inc. All Rights Reserved.
  4. //----------------------------------------------------------------------------
  5. //---------------------------------------------------------------------------
  6. #include <vcl.h>
  7. #pragma hdrstop
  8. //---------------------------------------------------------------------------
  9. USEFILE("readme.txt");
  10. USEFORM("ToolBar.cpp", fmToolBar);
  11. USERES("NAVSDI.res");
  12. USEDATAMODULE("DM.cpp", DM1);
  13. USEFORM("CustData.cpp", fmCustomer);
  14. USEFORM("CustOrds.cpp", fmCustOrd);
  15. USEFORM("About.cpp", fmAboutBox);
  16. //---------------------------------------------------------------------
  17. WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
  18. {
  19.    try
  20.    {
  21.         Application->Initialize();
  22.         Application->CreateForm(__classid(TfmToolBar), &fmToolBar);
  23.         Application->CreateForm(__classid(TDM1), &DM1);
  24.         Application->CreateForm(__classid(TfmCustomer), &fmCustomer);
  25.         Application->CreateForm(__classid(TfmCustOrd), &fmCustOrd);
  26.         Application->CreateForm(__classid(TfmAboutBox), &fmAboutBox);
  27.         Application->Run();
  28.    }
  29.    catch (Exception &exception)
  30.    {
  31.         Application->ShowException(&exception);
  32.    }
  33.         return 0;
  34. }
  35. //---------------------------------------------------------------------------
  36.